inherited dtmcg_OrderTrace: Tdtmcg_OrderTrace
  OldCreateOrder = True
  Left = 1220
  Top = 305
  Height = 356
  Width = 529
  inherited adsMaster: TADODataSet
    CursorType = ctStatic
    CommandText = 'Select * from V_cg_OrderDetail where 0=1'
    Left = 88
    Top = 80
    object adsMasterID: TStringField
      FieldName = 'ID'
    end
    object adsMasterOrderID: TStringField
      DisplayLabel = #35746#21333'ID'
      FieldName = 'OrderID'
    end
    object adsMasterOrderNo: TStringField
      DisplayLabel = #35746#21333#32534#21495
      FieldName = 'OrderNo'
    end
    object adsMasterOrderType: TStringField
      DisplayLabel = #35746#21333#31867#22411
      FieldName = 'OrderType'
    end
    object adsMasterOrderTypename: TStringField
      DisplayLabel = #35746#21333#31867#22411
      FieldName = 'OrderTypename'
      Size = 50
    end
    object adsMasterOrderDate: TDateTimeField
      DisplayLabel = #35746#21333#26085#26399
      FieldName = 'OrderDate'
    end
    object adsMasterOrderStatus: TStringField
      DisplayLabel = #35746#21333#29366#24577
      FieldName = 'OrderStatus'
    end
    object adsMasterOrderStatusname: TStringField
      DisplayLabel = #35746#21333#29366#24577
      FieldName = 'OrderStatusname'
      Size = 50
    end
    object adsMasterOrderKind: TStringField
      DisplayLabel = #19979#21333#26041#24335
      FieldName = 'OrderKind'
    end
    object adsMasterOrderKindname: TStringField
      DisplayLabel = #19979#21333#26041#24335
      FieldName = 'OrderKindname'
      Size = 50
    end
    object adsMasterOrderFlow: TStringField
      DisplayLabel = #28304#21333#31867#22411
      FieldName = 'OrderFlow'
    end
    object adsMasterOrderFlowname: TStringField
      DisplayLabel = #28304#21333#31867#22411
      FieldName = 'OrderFlowname'
      Size = 50
    end
    object adsMasterDataType: TStringField
      DisplayLabel = #21333#25454#31867#22411
      FieldName = 'DataType'
    end
    object adsMasterDeptID: TStringField
      DisplayLabel = #20844#21496'ID'
      FieldName = 'DeptID'
    end
    object adsMasterProcessID: TStringField
      DisplayLabel = #31867#22411'ID'
      FieldName = 'ProcessID'
    end
    object adsMasterProcessName: TStringField
      DisplayLabel = #31867#22411
      FieldName = 'ProcessName'
      Size = 50
    end
    object adsMasterSupplyID: TStringField
      DisplayLabel = #20379#24212#21830'ID'
      FieldName = 'SupplyID'
    end
    object adsMasterOrderDetailNo: TStringField
      DisplayLabel = #37319#36141#35746#21333#26126#32454#21333#21495
      FieldName = 'OrderDetailNo'
    end
    object adsMasterSupplyCode: TStringField
      DisplayLabel = #20379#24212#21830#32534#30721
      FieldName = 'SupplyCode'
    end
    object adsMasterSupplyShortName: TStringField
      DisplayLabel = #20379#24212#21830#21517#31216
      FieldName = 'SupplyShortName'
    end
    object adsMasterContractNo: TStringField
      DisplayLabel = #21512#21516#32534#21495
      FieldName = 'ContractNo'
      Size = 50
    end
    object adsMasterEmpID: TStringField
      DisplayLabel = #37319#36141#21592
      FieldName = 'EmpID'
    end
    object adsMasterEmpName: TStringField
      DisplayLabel = #37319#36141#21592
      FieldName = 'EmpName'
    end
    object adsMasterHasCheck: TBooleanField
      DisplayLabel = #23457#26680#21542
      FieldName = 'HasCheck'
    end
    object adsMasterCustOrderDetailNo: TStringField
      DisplayLabel = #23458#25143#35746#21333#26126#32454#21333#21495
      FieldName = 'CustOrderDetailNo'
    end
    object adsMasterCustOrderNo: TStringField
      DisplayLabel = #23458#25143#35746#21333#21495
      FieldName = 'CustOrderNo'
      Size = 50
    end
    object adsMasterCustProductCode: TStringField
      DisplayLabel = #23458#25143#36135#21495
      FieldName = 'CustProductCode'
      Size = 50
    end
    object adsMasterCustColor: TStringField
      DisplayLabel = #23458#25143#39068#33394
      FieldName = 'CustColor'
      Size = 50
    end
    object adsMasterCustID: TStringField
      DisplayLabel = #23458#25143'ID'
      FieldName = 'CustID'
    end
    object adsMasterCustCode: TStringField
      DisplayLabel = #23458#25143#32534#30721
      FieldName = 'CustCode'
    end
    object adsMasterCustShortName: TStringField
      DisplayLabel = #23458#25143#21517#31216
      FieldName = 'CustShortName'
      Size = 50
    end
    object adsMasterProductID: TStringField
      DisplayLabel = #20135#21697'ID'
      FieldName = 'ProductID'
    end
    object adsMasterProductCode: TStringField
      DisplayLabel = #20135#21697#32534#30721
      FieldName = 'ProductCode'
      Size = 50
    end
    object adsMasterProductName: TStringField
      DisplayLabel = #20135#21697#21517#31216
      FieldName = 'ProductName'
      Size = 100
    end
    object adsMasterSpecs: TStringField
      DisplayLabel = #22411#21495#35268#26684
      FieldName = 'Specs'
      Size = 200
    end
    object adsMasterSupplySpecs: TStringField
      DisplayLabel = #20379#24212#21830#22411#21495
      FieldName = 'SupplySpecs'
      Size = 200
    end
    object adsMasterColorID: TStringField
      DisplayLabel = #33394#21495'ID'
      FieldName = 'ColorID'
    end
    object adsMasterColorCode: TStringField
      DisplayLabel = #33394#21495
      FieldName = 'ColorCode'
    end
    object adsMasterColorName: TStringField
      DisplayLabel = #39068#33394
      FieldName = 'ColorName'
      Size = 50
    end
    object adsMasterHeight: TStringField
      DisplayLabel = #33457#39640
      FieldName = 'Height'
      Size = 50
    end
    object adsMasterWidth: TStringField
      DisplayLabel = #33457#23485
      FieldName = 'Width'
      Size = 50
    end
    object adsMasterBreadth: TStringField
      DisplayLabel = #24133#23485
      FieldName = 'Breadth'
      Size = 50
    end
    object adsMasterGram: TStringField
      DisplayLabel = #20811#37325
      FieldName = 'Gram'
      Size = 50
    end
    object adsMasterPieceCount: TFloatField
      DisplayLabel = #19979#21333#21305#25968
      FieldName = 'PieceCount'
    end
    object adsMasterNumber: TFloatField
      DisplayLabel = #19979#21333#25968#37327
      FieldName = 'Number'
    end
    object adsMasterUnitID: TStringField
      DisplayLabel = #21333#20301'ID'
      FieldName = 'UnitID'
    end
    object adsMasterUnitName: TStringField
      DisplayLabel = #21333#20301
      FieldName = 'UnitName'
    end
    object adsMasterPrice: TFloatField
      DisplayLabel = #21333#20215
      FieldName = 'Price'
    end
    object adsMasterMoney: TFloatField
      DisplayLabel = #37329#39069
      FieldName = 'Money'
    end
    object adsMasterRequestDate: TDateTimeField
      DisplayLabel = #20132#36135#26085#26399
      FieldName = 'RequestDate'
    end
    object adsMasterDdRequestDate: TDateTimeField
      DisplayLabel = #23458#25143#35201#27714#36135#26399
      FieldName = 'DdRequestDate'
    end
    object adsMasterBuyRequest: TStringField
      DisplayLabel = #37319#36141#35201#27714
      FieldName = 'BuyRequest'
      Size = 500
    end
    object adsMasterBuyStatus: TIntegerField
      DisplayLabel = #25910#36135#24773#20917
      FieldName = 'BuyStatus'
    end
    object adsMasterBuyStatusname: TStringField
      DisplayLabel = #25910#36135#24773#20917
      FieldName = 'BuyStatusname'
      Size = 50
    end
    object adsMasterBuyNumber: TFloatField
      DisplayLabel = #25910#36135#25968#37327
      FieldName = 'BuyNumber'
    end
    object adsMasterBuyDate: TDateTimeField
      DisplayLabel = #25910#36135#26085#26399
      FieldName = 'BuyDate'
    end
    object adsMasterBackNumber: TFloatField
      DisplayLabel = #36864#36135#25968#37327
      FieldName = 'BackNumber'
    end
    object adsMasterBackDate: TDateTimeField
      DisplayLabel = #36864#36135#26085#26399
      FieldName = 'BackDate'
    end
    object adsMasterStatus: TIntegerField
      DisplayLabel = #29366#24577
      FieldName = 'Status'
    end
    object adsMasterWriter: TStringField
      DisplayLabel = #39318#36755#20154
      FieldName = 'Writer'
    end
    object adsMasterWriteTime: TDateTimeField
      DisplayLabel = #39318#36755#26102#38388
      FieldName = 'WriteTime'
    end
    object adsMasterModifier: TStringField
      DisplayLabel = #20462#25913#20154
      FieldName = 'Modifier'
    end
    object adsMasterModifyTime: TDateTimeField
      DisplayLabel = #20462#25913#26102#38388
      FieldName = 'ModifyTime'
    end
    object adsMasterRemark: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'Remark'
      Size = 500
    end
  end
  inherited frdsMain: TfrDBDataSet
    Left = 88
    Top = 136
  end
  inherited frdsMasterEdit: TfrDBDataSet
    Left = 88
    Top = 200
  end
  object adsOrderType: TADODataSet
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 'Select * from V_cg_OrderType'
    Parameters = <>
    Left = 200
    Top = 80
  end
  object adsUserCompany: TADODataSet
    Connection = dtmConnect.conMain
    LockType = ltBatchOptimistic
    CommandText = 
      'select b.DeptID, b.DeptCode, b.DeptName from xt_CompanySet a '#13#10'j' +
      'oin da_Department b on a.CompanyID=b.DeptID'#13#10'where a.UserID=(sel' +
      'ect UserID from xt_Users where UserCode=:UserCode)'
    Parameters = <
      item
        Name = 'UserCode'
        Size = -1
        Value = Null
      end>
    Left = 200
    Top = 144
  end
  object adsBuy_RevDetail: TADODataSet
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 
      'select StockName,BillDate,billno,supplycode,SupplyShortName,Proc' +
      'essName,ProductCode,ProductName,BatchNo,ColorCode,'#13#10'ColorName,Gr' +
      'adeName,PieceCount,number,UnitName,Meter,Yard,Weight    from V_c' +
      'k_StripInList '#13#10'where SourceBillDetailNo=:SourceBillDetailNo'
    EnableBCD = False
    Parameters = <
      item
        Name = 'SourceBillDetailNo'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 20
        Value = Null
      end>
    Left = 328
    Top = 144
    object adsBuy_RevDetailStockName: TStringField
      DisplayLabel = #20179#24211#21517#31216
      FieldName = 'StockName'
      Size = 50
    end
    object adsBuy_RevDetailBillDate: TDateTimeField
      DisplayLabel = #20837#24211#26085#26399
      FieldName = 'BillDate'
    end
    object adsBuy_RevDetailbillno: TStringField
      DisplayLabel = #20837#24211#21333#21495
      FieldName = 'billno'
    end
    object adsBuy_RevDetailSupplyShortName: TStringField
      DisplayLabel = #20379#24212#21830#21517#31216
      FieldName = 'SupplyShortName'
      ReadOnly = True
      Size = 50
    end
    object adsBuy_RevDetailProcessName: TStringField
      DisplayLabel = #31867#22411
      FieldName = 'ProcessName'
      Size = 50
    end
    object adsBuy_RevDetailProductCode: TStringField
      DisplayLabel = #20135#21697#32534#30721
      FieldName = 'ProductCode'
      Size = 50
    end
    object adsBuy_RevDetailProductName: TStringField
      DisplayLabel = #20135#21697#21517#31216
      FieldName = 'ProductName'
      Size = 100
    end
    object adsBuy_RevDetailBatchNo: TStringField
      DisplayLabel = #25209#21495
      FieldName = 'BatchNo'
      Size = 50
    end
    object adsBuy_RevDetailColorCode: TStringField
      DisplayLabel = #33394#21495
      FieldName = 'ColorCode'
    end
    object adsBuy_RevDetailColorName: TStringField
      DisplayLabel = #39068#33394
      FieldName = 'ColorName'
      Size = 50
    end
    object adsBuy_RevDetailGradeName: TStringField
      DisplayLabel = #31561#32423
      FieldName = 'GradeName'
      Size = 50
    end
    object adsBuy_RevDetailPieceCount: TFloatField
      DisplayLabel = #21305#25968
      FieldName = 'PieceCount'
    end
    object adsBuy_RevDetailnumber: TFloatField
      DisplayLabel = #25968#37327
      FieldName = 'number'
    end
    object adsBuy_RevDetailUnitName: TStringField
      DisplayLabel = #21333#20301
      FieldName = 'UnitName'
    end
    object adsBuy_RevDetailMeter: TFloatField
      DisplayLabel = #31859#25968
      FieldName = 'Meter'
    end
    object adsBuy_RevDetailYard: TFloatField
      DisplayLabel = #30721#25968
      FieldName = 'Yard'
    end
    object adsBuy_RevDetailWeight: TFloatField
      DisplayLabel = #37325#37327'(KG)'
      FieldName = 'Weight'
    end
  end
  object adsck_ProductDetail: TADODataSet
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 
      'select StockName,BillDate,billno,supplycode,SupplyShortName,Proc' +
      'essName,ProductCode,ProductName,BatchNo,ColorCode,'#13#10'ColorName,Gr' +
      'adeName,PieceCount,number,UnitName,Meter,Yard,Weight    from V_c' +
      'k_ProductInList '#13#10'where SourceBillDetailNo=:SourceBillDetailNo'
    EnableBCD = False
    Parameters = <
      item
        Name = 'SourceBillDetailNo'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 20
        Value = Null
      end>
    Left = 240
    Top = 224
    object StringField1: TStringField
      DisplayLabel = #20179#24211#21517#31216
      FieldName = 'StockName'
      Size = 50
    end
    object DateTimeField1: TDateTimeField
      DisplayLabel = #20837#24211#26085#26399
      FieldName = 'BillDate'
    end
    object StringField2: TStringField
      DisplayLabel = #20837#24211#21333#21495
      FieldName = 'billno'
    end
    object StringField3: TStringField
      DisplayLabel = #20379#24212#21830#21517#31216
      FieldName = 'SupplyShortName'
      ReadOnly = True
      Size = 50
    end
    object StringField4: TStringField
      DisplayLabel = #31867#22411
      FieldName = 'ProcessName'
      Size = 50
    end
    object StringField5: TStringField
      DisplayLabel = #20135#21697#32534#30721
      FieldName = 'ProductCode'
      Size = 50
    end
    object StringField6: TStringField
      DisplayLabel = #20135#21697#21517#31216
      FieldName = 'ProductName'
      Size = 100
    end
    object StringField7: TStringField
      DisplayLabel = #25209#21495
      FieldName = 'BatchNo'
      Size = 50
    end
    object StringField8: TStringField
      DisplayLabel = #33394#21495
      FieldName = 'ColorCode'
    end
    object StringField9: TStringField
      DisplayLabel = #39068#33394
      FieldName = 'ColorName'
      Size = 50
    end
    object StringField10: TStringField
      DisplayLabel = #31561#32423
      FieldName = 'GradeName'
      Size = 50
    end
    object FloatField2: TFloatField
      DisplayLabel = #25968#37327
      FieldName = 'number'
    end
    object StringField11: TStringField
      DisplayLabel = #21333#20301
      FieldName = 'UnitName'
    end
    object FloatField3: TFloatField
      DisplayLabel = #31859#25968
      FieldName = 'Meter'
    end
    object FloatField4: TFloatField
      DisplayLabel = #30721#25968
      FieldName = 'Yard'
    end
    object FloatField5: TFloatField
      DisplayLabel = #37325#37327'(KG)'
      FieldName = 'Weight'
    end
    object adsck_ProductDetailsupplycode: TStringField
      DisplayLabel = #20379#24212#21830#32534#30721
      FieldName = 'supplycode'
      ReadOnly = True
    end
    object adsck_ProductDetailPieceCount: TFloatField
      DisplayLabel = #21305#25968
      FieldName = 'PieceCount'
    end
  end
  object adsdye_StuffInList: TADODataSet
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 
      'select StockName,BillDate,billno,supplycode,SupplyShortName,Proc' +
      'essName,StuffCode,specs,'#13#10'StuffName,BatchNo,ColorName,PieceCount' +
      ',number,UnitName    from V_ck_StuffInList'#13#10'where SourceBillDetai' +
      'lNo=:SourceBillDetailNo'
    EnableBCD = False
    Parameters = <
      item
        Name = 'SourceBillDetailNo'
        Attributes = [paNullable]
        DataType = ftString
        NumericScale = 255
        Precision = 255
        Size = 20
        Value = Null
      end>
    Left = 312
    Top = 32
    object adsdye_StuffInListStockName: TStringField
      DisplayLabel = #20179#24211#21517#31216
      FieldName = 'StockName'
      Size = 50
    end
    object adsdye_StuffInListBillDate: TDateTimeField
      DisplayLabel = #20837#24211#26085#26399
      FieldName = 'BillDate'
    end
    object adsdye_StuffInListbillno: TStringField
      DisplayLabel = #20837#24211#21333#21495
      FieldName = 'billno'
    end
    object adsdye_StuffInListsupplycode: TStringField
      DisplayLabel = #20379#24212#21830#32534#30721
      FieldName = 'supplycode'
      ReadOnly = True
    end
    object adsdye_StuffInListSupplyShortName: TStringField
      DisplayLabel = #20379#24212#21830#21517#31216
      FieldName = 'SupplyShortName'
      ReadOnly = True
      Size = 50
    end
    object adsdye_StuffInListProcessName: TStringField
      DisplayLabel = #31867#22411
      FieldName = 'ProcessName'
      Size = 50
    end
    object adsdye_StuffInListStuffCode: TStringField
      DisplayLabel = #29289#26009#32534#30721
      FieldName = 'StuffCode'
      Size = 50
    end
    object adsdye_StuffInListStuffName: TStringField
      DisplayLabel = #29289#26009#21517#31216
      FieldName = 'StuffName'
      Size = 100
    end
    object adsdye_StuffInListspecs: TStringField
      DisplayLabel = #22411#21495#35268#26684
      FieldName = 'specs'
      Size = 1000
    end
    object adsdye_StuffInListBatchNo: TStringField
      DisplayLabel = #25209#21495
      FieldName = 'BatchNo'
      Size = 50
    end
    object adsdye_StuffInListColorName: TStringField
      DisplayLabel = #39068#33394
      FieldName = 'ColorName'
      Size = 50
    end
    object adsdye_StuffInListPieceCount: TIntegerField
      DisplayLabel = #20214#25968
      FieldName = 'PieceCount'
    end
    object adsdye_StuffInListnumber: TFloatField
      DisplayLabel = #25968#37327
      FieldName = 'number'
    end
    object adsdye_StuffInListUnitName: TStringField
      DisplayLabel = #21333#20301
      FieldName = 'UnitName'
    end
  end
end
